home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 22
/
Cream of the Crop 22.iso
/
games
/
zmud32.zip
/
ZMUD.EXE
/
0
/
RCDATA
/
TCOLORPREF
/
TCOLORPREF.txt
Wrap
Text File
|
1996-08-04
|
51KB
|
2,040 lines
object ColorPref: TColorPref
Left = 232
Top = 102
ActiveControl = OKBtn
BorderStyle = bsDialog
Caption = 'Color Preferences'
ClientHeight = 367
ClientWidth = 498
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Position = poScreenCenter
ShowHint = True
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label51: TLabel
Left = 16
Top = 312
Width = 298
Height = 13
Caption =
'If this option is checked, colors for this setting file can be e' +
'dited'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label52: TLabel
Left = 16
Top = 326
Width = 247
Height = 13
Caption = 'but colors from the Inherited file will actually be used.'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object OKBtn: TBitBtn
Left = 328
Top = 328
Width = 77
Height = 27
Caption = 'OK'
Default = True
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 1
ParentFont = False
TabOrder = 0
OnClick = OKBtnClick
Margin = 2
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object TabbedNotebook1: TTabbedNotebook
Left = 0
Top = 0
Width = 497
Height = 305
TabsPerRow = 5
TabFont.Color = clBtnText
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 1
object TTabPage
Left = 4
Top = 24
Caption = 'System Colors'
object Image3: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label38: TLabel
Left = 40
Top = 16
Width = 363
Height = 13
Caption =
'To change one of these colors, click the button to the right of ' +
'the sample text'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label39: TLabel
Left = 40
Top = 48
Width = 340
Height = 13
Caption =
'This color is used to display informational text from zMUD on yo' +
'ur screen'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 230
Top = 64
Width = 21
Height = 21
Hint = 'Change info color|'
Margin = 1
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object Label1: TLabel
Left = 40
Top = 96
Width = 367
Height = 13
Caption =
'This color is used to echo the commands you send to the MUD to y' +
'our screen'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton2: TSpeedButton
Tag = 1
Left = 230
Top = 112
Width = 21
Height = 21
Hint = 'Change echo color'
Margin = 1
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object Label7: TLabel
Left = 40
Top = 144
Width = 297
Height = 13
Caption = 'This color is used as the default for text received from the MUD'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton3: TSpeedButton
Tag = 2
Left = 230
Top = 176
Width = 21
Height = 21
Hint = 'Change default color|'
Margin = 1
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object Label40: TLabel
Left = 40
Top = 158
Width = 346
Height = 13
Caption =
'Note that the MUD can override this color using ANSI color contr' +
'ol codes'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 40
Top = 66
Width = 56
Height = 13
Caption = 'Info Color'
end
object Label41: TLabel
Left = 40
Top = 114
Width = 63
Height = 13
Caption = 'Echo Color'
end
object Label42: TLabel
Left = 40
Top = 178
Width = 75
Height = 13
Caption = 'Default Color'
end
object Label61: TLabel
Left = 40
Top = 208
Width = 220
Height = 13
Caption = 'This color is used to highlight text in the screen'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label62: TLabel
Left = 40
Top = 226
Width = 84
Height = 13
Caption = 'Highlight Color'
end
object SpeedButton5: TSpeedButton
Tag = 3
Left = 230
Top = 224
Width = 21
Height = 21
Hint = 'Change highlight color|'
Margin = 1
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object InfoColor: TEdit
Left = 128
Top = 64
Width = 97
Height = 21
TabStop = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Courier'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 0
Text = 'Sample Text'
end
object CmdColor: TEdit
Left = 128
Top = 112
Width = 97
Height = 21
TabStop = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Courier'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 1
Text = 'Sample Text'
end
object TextColor: TEdit
Left = 128
Top = 176
Width = 97
Height = 21
TabStop = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Courier'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 2
Text = 'Sample Text'
end
object HighColor: TEdit
Left = 128
Top = 224
Width = 97
Height = 21
TabStop = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'Courier'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 3
Text = 'Sample Text'
end
end
object TTabPage
Left = 4
Top = 24
Caption = 'Foreground'
object Image1: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label18: TLabel
Left = 40
Top = 16
Width = 305
Height = 13
Caption =
'Color mapping assigns actual colors to the 16 ANSI color indicie' +
's'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label19: TLabel
Left = 56
Top = 32
Width = 162
Height = 13
Caption = 'The first 8 colors are regular colors'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label20: TLabel
Left = 56
Top = 46
Width = 280
Height = 13
Caption = 'The second 8 colors are selected by the ANSI highlight flag'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label21: TLabel
Left = 72
Top = 60
Width = 315
Height = 13
Caption =
'which can be set to activate these colors, or to activate a bold' +
' font'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label23: TLabel
Left = 40
Top = 76
Width = 385
Height = 13
Caption =
'To edit a color mapping, click on the box containing the color y' +
'ou want to change'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object GroupBox2: TGroupBox
Left = 40
Top = 136
Width = 297
Height = 129
Caption = 'Foreground Colors'
TabOrder = 0
object Label22: TLabel
Left = 34
Top = 100
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '8'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 127
Top = 100
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '11'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label26: TLabel
Left = 159
Top = 100
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '12'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label28: TLabel
Left = 191
Top = 100
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '13'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label2: TLabel
Left = 34
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '0'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 66
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '1'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 98
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '2'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 130
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '3'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 162
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '4'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 194
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '5'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 226
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '6'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 258
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '7'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 66
Top = 100
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '9'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 95
Top = 100
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '10'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 223
Top = 100
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '14'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 255
Top = 100
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '15'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Color0: TPanel
Left = 24
Top = 40
Width = 25
Height = 25
TabOrder = 0
OnClick = Color0Click
end
object Color1: TPanel
Left = 56
Top = 40
Width = 25
Height = 25
TabOrder = 1
OnClick = Color0Click
end
object Color2: TPanel
Left = 88
Top = 40
Width = 25
Height = 25
TabOrder = 2
OnClick = Color0Click
end
object Color3: TPanel
Left = 120
Top = 40
Width = 25
Height = 25
TabOrder = 3
OnClick = Color0Click
end
object Color4: TPanel
Left = 152
Top = 40
Width = 25
Height = 25
TabOrder = 4
OnClick = Color0Click
end
object Color5: TPanel
Left = 184
Top = 40
Width = 25
Height = 25
TabOrder = 5
OnClick = Color0Click
end
object Color6: TPanel
Left = 216
Top = 40
Width = 25
Height = 25
TabOrder = 6
OnClick = Color0Click
end
object Color7: TPanel
Left = 248
Top = 40
Width = 25
Height = 25
TabOrder = 7
OnClick = Color0Click
end
object Color8: TPanel
Left = 24
Top = 72
Width = 25
Height = 25
TabOrder = 8
OnClick = Color0Click
end
object Color9: TPanel
Left = 56
Top = 72
Width = 25
Height = 25
TabOrder = 9
OnClick = Color0Click
end
object Color10: TPanel
Left = 88
Top = 72
Width = 25
Height = 25
TabOrder = 10
OnClick = Color0Click
end
object Color11: TPanel
Left = 120
Top = 72
Width = 25
Height = 25
TabOrder = 11
OnClick = Color0Click
end
object Color12: TPanel
Left = 152
Top = 72
Width = 25
Height = 25
TabOrder = 12
OnClick = Color0Click
end
object Color13: TPanel
Left = 184
Top = 72
Width = 25
Height = 25
TabOrder = 13
OnClick = Color0Click
end
object Color14: TPanel
Left = 216
Top = 72
Width = 25
Height = 25
TabOrder = 14
OnClick = Color0Click
end
object Color15: TPanel
Left = 248
Top = 72
Width = 25
Height = 25
TabOrder = 15
OnClick = Color0Click
end
end
object BitBtn10: TBitBtn
Left = 40
Top = 104
Width = 175
Height = 25
Caption = 'Make regular colors &Dim'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = BitBtn10Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
B0557777FF577777F7F500000E055550805577777F7555575755500000555555
05555777775555557F55550005555555055555777555555575550000}
NumGlyphs = 2
end
object BitBtn15: TBitBtn
Tag = 1
Left = 216
Top = 104
Width = 175
Height = 25
Caption = 'Make regular colors &Bright'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = BitBtn10Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
B0557777FF577777F7F500000E055550805577777F7555575755500000555555
05555777775555557F55550005555555055555777555555575550000}
NumGlyphs = 2
end
object GroupBox1: TGroupBox
Left = 344
Top = 136
Width = 137
Height = 129
Caption = 'Use highlight flag to'
TabOrder = 3
object Selectcolor: TRadioButton
Left = 16
Top = 32
Width = 113
Height = 17
Caption = 'select upper colors'
Checked = True
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
TabStop = True
end
object Selectbold: TRadioButton
Left = 16
Top = 56
Width = 113
Height = 17
Caption = 'select bold font'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object Selectnone: TRadioButton
Left = 16
Top = 80
Width = 113
Height = 17
Caption = 'ignore it'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
end
end
object TTabPage
Left = 4
Top = 24
Caption = 'Background'
object Image2: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label25: TLabel
Left = 40
Top = 16
Width = 299
Height = 13
Caption = 'Color mapping assigns actual colors to the 8 ANSI color indicies'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label27: TLabel
Left = 40
Top = 30
Width = 385
Height = 13
Caption =
'To edit a color mapping, click on the box containing the color y' +
'ou want to change'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label29: TLabel
Left = 40
Top = 174
Width = 402
Height = 13
Caption =
'The Lock Background flag ignores any background change messages ' +
'from the MUD'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object GroupBox3: TGroupBox
Left = 40
Top = 80
Width = 297
Height = 81
Caption = 'Background Colors'
TabOrder = 0
object Label30: TLabel
Left = 34
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '0'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label31: TLabel
Left = 66
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '1'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label32: TLabel
Left = 98
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '2'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label33: TLabel
Left = 130
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '3'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label34: TLabel
Left = 162
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '4'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label35: TLabel
Left = 194
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '5'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label36: TLabel
Left = 226
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '6'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label37: TLabel
Left = 258
Top = 22
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '7'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Back0: TPanel
Left = 24
Top = 40
Width = 25
Height = 25
TabOrder = 0
OnClick = Color0Click
end
object Back1: TPanel
Left = 56
Top = 40
Width = 25
Height = 25
TabOrder = 1
OnClick = Color0Click
end
object Back2: TPanel
Left = 88
Top = 40
Width = 25
Height = 25
TabOrder = 2
OnClick = Color0Click
end
object Back3: TPanel
Left = 120
Top = 40
Width = 25
Height = 25
TabOrder = 3
OnClick = Color0Click
end
object Back4: TPanel
Left = 152
Top = 40
Width = 25
Height = 25
TabOrder = 4
OnClick = Color0Click
end
object Back5: TPanel
Left = 184
Top = 40
Width = 25
Height = 25
TabOrder = 5
OnClick = Color0Click
end
object Back6: TPanel
Left = 216
Top = 40
Width = 25
Height = 25
TabOrder = 6
OnClick = Color0Click
end
object Back7: TPanel
Left = 248
Top = 40
Width = 25
Height = 25
TabOrder = 7
OnClick = Color0Click
end
end
object LockBack: TCheckBox
Left = 40
Top = 194
Width = 121
Height = 17
Caption = 'Lock Background'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object BitBtn2: TBitBtn
Left = 40
Top = 52
Width = 175
Height = 25
Caption = 'Set colors to default'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = BitBtn2Click
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
B0557777FF577777F7F500000E055550805577777F7555575755500000555555
05555777775555557F55550005555555055555777555555575550000}
NumGlyphs = 2
end
end
object TTabPage
Left = 4
Top = 24
Caption = 'Syntax'
object Image5: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label53: TLabel
Left = 40
Top = 16
Width = 345
Height = 13
Caption =
'Enter the syntax that your MUD uses to send color commands in yo' +
'ur text'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label54: TLabel
Left = 312
Top = 80
Width = 127
Height = 13
Caption = 'Syntax for foreground color'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label55: TLabel
Left = 312
Top = 128
Width = 133
Height = 13
Caption = 'Syntax for background color'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label56: TLabel
Left = 312
Top = 176
Width = 136
Height = 13
Caption = 'Syntax for setting both colors'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label57: TLabel
Left = 312
Top = 224
Width = 121
Height = 13
Caption = 'Syntax for resetting colors'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label58: TLabel
Left = 56
Top = 30
Width = 392
Height = 13
Caption =
'In the syntax sections, use F for foreground color code, and B f' +
'or background code'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label59: TLabel
Left = 56
Top = 56
Width = 114
Height = 13
Caption = 'Foreground Color Codes'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label60: TLabel
Left = 224
Top = 56
Width = 58
Height = 13
Caption = 'Background'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object sColor0: TLabel
Left = 32
Top = 72
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor1: TLabel
Left = 32
Top = 96
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor2: TLabel
Left = 32
Top = 120
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor3: TLabel
Left = 32
Top = 144
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor4: TLabel
Left = 32
Top = 168
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor5: TLabel
Left = 32
Top = 192
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor6: TLabel
Left = 32
Top = 216
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor7: TLabel
Left = 32
Top = 240
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor8: TLabel
Left = 128
Top = 72
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor9: TLabel
Left = 128
Top = 96
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor10: TLabel
Left = 128
Top = 120
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor11: TLabel
Left = 128
Top = 144
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor12: TLabel
Left = 128
Top = 168
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor13: TLabel
Left = 128
Top = 192
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor14: TLabel
Left = 128
Top = 216
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sColor15: TLabel
Left = 128
Top = 240
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sBack0: TLabel
Left = 224
Top = 72
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sBack1: TLabel
Left = 224
Top = 96
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sBack2: TLabel
Left = 224
Top = 120
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sBack3: TLabel
Left = 224
Top = 144
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sBack4: TLabel
Left = 224
Top = 168
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sBack5: TLabel
Left = 224
Top = 192
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sBack6: TLabel
Left = 224
Top = 216
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object sBack7: TLabel
Left = 224
Top = 240
Width = 20
Height = 20
AutoSize = False
Color = clBlack
ParentColor = False
end
object FCode1: TEdit
Left = 56
Top = 96
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object FCode2: TEdit
Left = 56
Top = 120
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object FCode3: TEdit
Left = 56
Top = 144
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
end
object FCode4: TEdit
Left = 56
Top = 168
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
end
object FCode5: TEdit
Left = 56
Top = 192
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 5
end
object FCode6: TEdit
Left = 56
Top = 216
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 6
end
object FCode7: TEdit
Left = 56
Top = 240
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 7
end
object FCode0: TEdit
Left = 56
Top = 72
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object FCode8: TEdit
Left = 152
Top = 72
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 8
end
object FCode9: TEdit
Left = 152
Top = 96
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
end
object FCode10: TEdit
Left = 152
Top = 120
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 10
end
object FCode11: TEdit
Left = 152
Top = 144
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 11
end
object FCode12: TEdit
Left = 152
Top = 168
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 12
end
object FCode13: TEdit
Left = 152
Top = 192
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 13
end
object FCode14: TEdit
Left = 152
Top = 216
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 14
end
object FCode15: TEdit
Left = 152
Top = 240
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 15
end
object BCode0: TEdit
Left = 248
Top = 72
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 16
end
object BCode1: TEdit
Left = 248
Top = 96
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 17
end
object BCode2: TEdit
Left = 248
Top = 120
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 18
end
object BCode3: TEdit
Left = 248
Top = 144
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 19
end
object BCode4: TEdit
Left = 248
Top = 168
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 20
end
object BCode5: TEdit
Left = 248
Top = 192
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 21
end
object BCode6: TEdit
Left = 248
Top = 216
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 22
end
object BCode7: TEdit
Left = 248
Top = 240
Width = 49
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 23
end
object ForeSyntax: TEdit
Left = 312
Top = 96
Width = 153
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 24
end
object BackSyntax: TEdit
Left = 312
Top = 144
Width = 153
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 25
end
object BothSyntax: TEdit
Left = 312
Top = 192
Width = 153
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 26
end
object ResetSyntax: TEdit
Left = 312
Top = 240
Width = 153
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 27
end
object SyntaxEn: TCheckBox
Left = 312
Top = 56
Width = 97
Height = 17
Caption = 'Syntax Enabled'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 28
end
end
object TTabPage
Left = 4
Top = 24
Caption = 'Window'
object Label3: TLabel
Left = 100
Top = 92
Width = 53
Height = 13
Alignment = taRightJustify
Caption = 'Solid Color:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 88
Top = 140
Width = 71
Height = 13
Caption = 'BMP Filename:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Image4: TImage
Left = 8
Top = 8
Width = 32
Height = 32
AutoSize = True
end
object Label43: TLabel
Left = 40
Top = 16
Width = 351
Height = 13
Caption =
'These window settings apply to the overall zMUD application main' +
' window'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label44: TLabel
Left = 40
Top = 32
Width = 387
Height = 13
Caption =
'Note that any changes to these settings only take place the next' +
' time zMUD is run'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label45: TLabel
Left = 40
Top = 56
Width = 335
Height = 13
Caption =
'You can use either a solid color, or a bitmap pattern for the ba' +
'ckground'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label46: TLabel
Left = 200
Top = 92
Width = 196
Height = 13
Caption = 'Click the box to the left to set a solid color'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label47: TLabel
Left = 200
Top = 122
Width = 173
Height = 13
Caption = 'Click this box to use a bitmap pattern'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label48: TLabel
Left = 224
Top = 150
Width = 147
Height = 13
Caption = 'If you leave the filename blank,'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label49: TLabel
Left = 224
Top = 164
Width = 211
Height = 13
Caption = 'the default zMUD marble pattern will be used'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label50: TLabel
Left = 200
Top = 202
Width = 234
Height = 13
Caption = 'A sample of the bitmap pattern is shown to the left'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object SpeedButton4: TSpeedButton
Left = 190
Top = 156
Width = 20
Height = 20
Hint = 'Change bitmap filename|'
Glyph.Data = {
90010000424D9001000000000000760000002800000020000000100000000100
0400000000000001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555500000000000555550000000000
05555008888888888055500B7B7B7B7B7055507088888888805550F0B7B7B7B7
B055507088888888880550B07B7B7B7B7B05507708888888880550FB07B7B7B7
B705507708888888888050BF0B7B7B7B7B70507770000888888050FBF00007B7
B7B0507777777000000550BFBFBFB0000005507777777777055550FBFBFBFBFB
0555507777777777055550BFBFBFBFBF0555507777700000555550FBFBF00000
5555550000055555555555000005555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
OnClick = BackNameClick
end
object Panel17: TPanel
Left = 160
Top = 88
Width = 25
Height = 25
Caption = 'Panel8'
TabOrder = 0
object BackColor: TLabel
Left = 1
Top = 1
Width = 23
Height = 23
Align = alClient
OnClick = Color0Click
end
end
object UseBitmap: TCheckBox
Left = 104
Top = 120
Width = 81
Height = 17
Alignment = taLeftJustify
Caption = 'Use Bitmap:'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object BackName: TEdit
Left = 88
Top = 156
Width = 97
Height = 21
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnChange = BackNameChange
end
object Panel18: TPanel
Left = 88
Top = 184
Width = 97
Height = 81
BevelOuter = bvLowered
TabOrder = 3
object TestImage: TImage
Left = 1
Top = 1
Width = 95
Height = 79
Align = alClient
Center = True
end
end
end
end
object UseColor: TCheckBox
Left = 16
Top = 342
Width = 209
Height = 17
Caption = 'Use colors from Inherited settings file'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
end
object CancelBtn: TBitBtn
Left = 413
Top = 328
Width = 77
Height = 27
Cancel = True
Caption = 'Cancel'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ModalResult = 2
ParentFont = False
TabOrder = 3
Margin = 2
NumGlyphs = 2
Spacing = -1
IsControl = True
end
object ColorDialog1: TColorDialog
Ctl3D = True
Left = 448
Top = 32
end
object OpenBmp: TOpenDialog
DefaultExt = 'BMP'
FileEditStyle = fsEdit
Filter = 'Images|*.bmp'
Left = 448
Top = 64
end
end